package org.boz.dial;

public class LispInt extends LispObject {
	private int m_value;

	public LispInt(int value) {
		m_value = value;
	}

	public int value() {
		return m_value;
	}

	public boolean equals(Object o) {
		if (o instanceof LispInt) {
			if (((LispInt) o).m_value == m_value) {
				return true;
			}
		}
		return false;
	}

	public Object toObject() {
		return new Integer(m_value);
	}

	public String toString() {
		return Integer.toString(m_value);
	}

	public LispObject eval(LispObject env) {
		return this;
	}
}
